home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Trading on the Edge
/
Trading On The Edge - CD-ROM Toolkit (Wayzata Technology)(2031)(1994).bin
/
pc
/
mac_file
/
vendor_d
/
neuralwa
/
nw2v50
/
lay_wgth.ipb
< prev
next >
Wrap
Text File
|
1993-08-23
|
1KB
|
54 lines
inst3.1 ! Feb 7 1989
!****************************************************************
!* *
!* Histogram of weights into pointed to layer *
!* *
!****************************************************************
!
! This script builds an instrument which displays the
! weights into the pointed to layer as a histogram
!
@Vars NP !Prompt for near layer and position
@NrLX !Get layer index of near PE
?NPEl 0
>bge lab0
@Err "A non-constant layer must be pointed to"
:lab0
=PNam "_lay_"
+PNam NPEl !Append layer number to name
@PbAS !Add Probe
?PbSt 0 !Check status of probe
>beq lab3 !Already there, don't add component
@PALy !Add Near Layer to probe
:lab3
! *** Build Instrument ***
@ILdD !load default instrument
=ITit "Layer " !Instrument title
+ITit NPEl !Append layer number to title
+ITit " Weights"
=Ivmn &vmn
=Ivmx &vmx
?&gnx 1
>bgt lab1
=Ignx 2
>br lab2
:lab1
=Ignx &gnx
:lab2
! Height and width
=f0 Ignx
/f0 0.1 !multiply by 10
=Ihgt 50 !height of graph
=Iwdt f0 !Width of graph
=IGVr "Weight"
=IGTy "Hist"
=ITMd 0 !No transformation
=IRcA 0 !Not active in recall
=ILDv 10 !Every 10 iterations
=IPrb PNam !Point to probe
@IAdd !Now create instrument